* dbusbind.c (syms_of_dbusbind): Set $DBUS_FATAL_WARNINGS to "0".

(Bug#7113)

diff --git a/src/ChangeLog b/src/ChangeLog
index a10b375a4bafc0ca4088271dce121e01922a8be7..b7ae20738b2717b414fdc1fdd328f76a536e611e 100644 (file)
--- a/src/ChangeLog
+++ b/src/ChangeLog
@@ -1,6 +1,6 @@
 2010-09-27  Michael Albinus  <michael.albinus@gmx.de>
 
-       * dbusbind.c (syms_of_dbusbind): Unset $DBUS_FATAL_WARNINGS.
+       * dbusbind.c (syms_of_dbusbind): Set $DBUS_FATAL_WARNINGS to "0".
        (Bug#7113)
 
 2010-09-26  Jan Djärv  <jan.h.d@swipnet.se>

diff --git a/src/dbusbind.c b/src/dbusbind.c
index 6fc5a9234221878c5661aa8a15734ff2a9f8b9cc..0b5d32ce467aee65cc6b94bf326b1c8d999a9119 100644 (file)
--- a/src/dbusbind.c
+++ b/src/dbusbind.c
@@ -2130,10 +2130,12 @@ message arrives.  */);
     doc: /* If non-nil, debug messages of D-Bus bindings are raised.  */);
 #ifdef DBUS_DEBUG
   Vdbus_debug = Qt;
+  /* We can also set environment DBUS_VERBOSE=1 in order to see more
+     traces.  */
 #else
   Vdbus_debug = Qnil;
   /* We do not want to abort.  */
-  unsetenv ("DBUS_FATAL_WARNINGS");
+  setenv ("DBUS_FATAL_WARNINGS", 0, 1);
 #endif
 
   Fprovide (intern_c_string ("dbusbind"), Qnil);